home *** CD-ROM | disk | FTP | other *** search
/ User's Choice Windows CD / User's Choice Windows CD (CMS Software)(1993).iso / misc1 / ami301c.zip / LOTUSTIL.SM$ / LOTUSTIL.SMM
INI File  |  1993-05-13  |  25KB  |  1,930 lines

  1. [ver]
  2.     4
  3. [sty]
  4.     _macro.sty
  5. [files]
  6. [charset]
  7.     82
  8.     ANSI (Windows, IBM CP 1252)
  9. [revisions]
  10.     0
  11. [prn]
  12.     Apple LaserWriter Plus
  13. [port]
  14.     LPT1:
  15. [lang]
  16.     1
  17. [desc]
  18.     Tile Lotus Applications
  19.     
  20.     
  21.     
  22.     
  23.     737313834
  24.     145
  25.     706294561
  26.     2082
  27.     7
  28.     0
  29.     0
  30.     0
  31.     0
  32.     
  33.     
  34.     
  35.     
  36.     
  37.     
  38.     1
  39. [fopts]
  40.     0
  41.     1
  42.     0
  43.     0
  44. [lnopts]
  45.     2
  46.     Body Text
  47.     1
  48. [docopts]
  49.     5
  50.     2
  51. [GramStyle]
  52.     
  53. [ParaNum]
  54.     1
  55. [tag]
  56.     Body Text
  57.     2
  58.     [fnt]
  59.         Arial
  60.         240
  61.         0
  62.         16384
  63.     [algn]
  64.         1
  65.         1
  66.         216
  67.         0
  68.         0
  69.     [spc]
  70.         33
  71.         273
  72.         1
  73.         0
  74.         0
  75.         1
  76.         100
  77.     [brk]
  78.         4
  79.     [line]
  80.         8
  81.         0
  82.         1
  83.         0
  84.         1
  85.         1
  86.         1
  87.         10
  88.         10
  89.         1
  90.     [spec]
  91.         0
  92.         0
  93.         
  94.         0
  95.         1
  96.         1
  97.         0
  98.         0
  99.         0
  100.         0
  101.     [nfmt]
  102.         272
  103.         1
  104.         3
  105.         .
  106.         ,
  107.         $
  108.     Body Text
  109.     0
  110.     0
  111. [tag]
  112.     Body Single
  113.     3
  114.     [fnt]
  115.         Times New Roman
  116.         240
  117.         0
  118.         49152
  119.     [algn]
  120.         1
  121.         1
  122.         0
  123.         0
  124.         0
  125.     [spc]
  126.         33
  127.         273
  128.         1
  129.         0
  130.         0
  131.         1
  132.         100
  133.     [brk]
  134.         4
  135.     [line]
  136.         8
  137.         0
  138.         1
  139.         0
  140.         1
  141.         1
  142.         1
  143.         10
  144.         10
  145.         1
  146.     [spec]
  147.         0
  148.         0
  149.         
  150.         0
  151.         1
  152.         1
  153.         0
  154.         0
  155.         0
  156.         0
  157.     [nfmt]
  158.         280
  159.         1
  160.         2
  161.         .
  162.         ,
  163.         $
  164.     Body Single
  165.     0
  166.     0
  167. [tag]
  168.     Function
  169.     4
  170.     [fnt]
  171.         Arial
  172.         240
  173.         0
  174.         16385
  175.     [algn]
  176.         1
  177.         1
  178.         0
  179.         0
  180.         0
  181.     [spc]
  182.         33
  183.         244
  184.         1
  185.         0
  186.         0
  187.         1
  188.         100
  189.     [brk]
  190.         68
  191.     [line]
  192.         8
  193.         0
  194.         1
  195.         0
  196.         1
  197.         1
  198.         1
  199.         10
  200.         10
  201.         1
  202.     [spec]
  203.         0
  204.         1
  205.         
  206.         0
  207.         1
  208.         1
  209.         0
  210.         0
  211.         0
  212.         0
  213.     [nfmt]
  214.         272
  215.         1
  216.         3
  217.         .
  218.         ,
  219.         $
  220.     Body Text
  221.     0
  222.     0
  223. [tag]
  224.     Table Text
  225.     5
  226.     [fnt]
  227.         Arial
  228.         240
  229.         0
  230.         16384
  231.     [algn]
  232.         1
  233.         1
  234.         0
  235.         0
  236.         0
  237.     [spc]
  238.         33
  239.         273
  240.         1
  241.         0
  242.         0
  243.         1
  244.         100
  245.     [brk]
  246.         4
  247.     [line]
  248.         8
  249.         0
  250.         1
  251.         0
  252.         1
  253.         1
  254.         1
  255.         10
  256.         10
  257.         1
  258.     [spec]
  259.         0
  260.         0
  261.         
  262.         0
  263.         1
  264.         1
  265.         0
  266.         0
  267.         0
  268.         0
  269.     [nfmt]
  270.         272
  271.         1
  272.         3
  273.         .
  274.         ,
  275.         $
  276.     Table Text
  277.     0
  278.     0
  279. [lay]
  280.     Standard
  281.     513
  282.     [rght]
  283.         15840
  284.         12240
  285.         1
  286.         1440
  287.         1440
  288.         1
  289.         1440
  290.         1440
  291.         0
  292.         1
  293.         0
  294.         1
  295.         0
  296.         2
  297.         1
  298.         1440
  299.         10800
  300.         12
  301.         1
  302.         720
  303.         1
  304.         1440
  305.         1
  306.         2160
  307.         1
  308.         2880
  309.         1
  310.         3600
  311.         1
  312.         4320
  313.         1
  314.         5040
  315.         1
  316.         5760
  317.         1
  318.         6480
  319.         1
  320.         7200
  321.         1
  322.         7920
  323.         1
  324.         8640
  325.     [hrght]
  326.     [lyfrm]
  327.         1
  328.         11200
  329.         0
  330.         0
  331.         12240
  332.         1440
  333.         0
  334.         1
  335.         3
  336.         1 0 0 0 0 0 0
  337.         0
  338.         0
  339.         1
  340.     [frmlay]
  341.         1440
  342.         12240
  343.         1
  344.         1440
  345.         72
  346.         1
  347.         792
  348.         1440
  349.         0
  350.         1
  351.         0
  352.         1
  353.         1
  354.         0
  355.         1
  356.         1440
  357.         10800
  358.         1
  359.         3
  360.         9360
  361.     [txt]
  362. >
  363.     [frght]
  364.     [lyfrm]
  365.         1
  366.         13248
  367.         0
  368.         14400
  369.         12240
  370.         15840
  371.         0
  372.         1
  373.         3
  374.         1 0 0 0 0 0 0
  375.         0
  376.         0
  377.         2
  378.     [frmlay]
  379.         15840
  380.         12240
  381.         1
  382.         1440
  383.         792
  384.         1
  385.         14472
  386.         1440
  387.         0
  388.         1
  389.         0
  390.         1
  391.         1
  392.         0
  393.         1
  394.         1440
  395.         10800
  396.         2
  397.         2
  398.         4680
  399.         3
  400.         9360
  401.     [txt]
  402. >
  403. [elay]
  404. [l1]
  405.     0
  406. [edoc]
  407. <:#568,9360>define    CreateFont()        DllCall("gdi,CreateFont,HHHHHHHHHHHHHHC", %1, %2, %3, %4, %5, %6, %7, %8, %9, %10, %11, %12, %13, %14)
  408.  
  409. <:#284,9360>define    DeleteObject(handle)    DllCall("gdi,DeleteObject,HH", %1)
  410.  
  411. <:#568,9360>define    SendMessage(hwnd, msg, wpara, lparm)    DllCall("user,SendMessage,HHHHJ", %1, %2, %3, %4)
  412.  
  413. <:#284,9360>define    WM_SETFONT    0x30
  414.  
  415. <:#284,9360>declare createdlgfont()
  416.  
  417. <:#284,9360>declare setfont(hdlg, id)
  418.  
  419. <:#284,9360>declare deletefont()
  420.  
  421. <:#284,9360>
  422.  
  423. <:#284,9360>Define IsWindowVisible(hWnd) DllCall("user,IsWindowVisible,HH", %1)
  424.  
  425. <:#284,9360>Define getsystemmetrics() dllcall("user,getsystemmetrics,HH", %1)
  426.  
  427. <:#284,9360>
  428.  
  429. <:#284,9360>Define FindWindow() DllCall("user,FindWindow,HCC", %1, %2)
  430.  
  431. <:#284,9360>Define Getfocus() DllCall("user,GetFocus,H")
  432.  
  433. <:#568,9360>Define MoveWindow() DllCall("User,MoveWindow,HHHHHHA",%1,%2,%3,%4,%5,%6)
  434.  
  435. <:#284,9360>Define SetFocus() DllCall("user,SetFocus,HH",%1)
  436.  
  437. <:#284,9360>Define ShowWindow(hWnd, stuff) DllCall("user,ShowWindow,HHH", %1, %2)
  438.  
  439. <:#568,9360>define WinHelpa(hWnd, file, cmd, ptr)    DllCall("user,WinHelp,HHCHJ", %1, %2, %3, %4)
  440.  
  441. <:#284,9360>
  442.  
  443. <:#284,9360>define IsIconic(hWnd) DllCall("user,IsIconic,HH", %1)
  444.  
  445. <:#284,9360>
  446.  
  447. <:#284,9360>define SC_RESTORE      0xF120
  448.  
  449. <:#284,9360>define WM_SYSCOMMAND       0x0112
  450.  
  451. <:#284,9360>
  452.  
  453. <:#284,9360>declare salesmessage(p1)
  454.  
  455. <:#284,9360>declare smartext()
  456.  
  457. <:#284,9360>declare launchapp(app, tileway, which)
  458.  
  459. <:#284,9360>
  460.  
  461. <:#284,9360>'macro by Charlie Pappas
  462.  
  463. <:#284,9360>
  464.  
  465. @Function@<:#293,9360>function tileapps()
  466.  
  467. <+@><:#284,9360>ignorekeyboard(1)
  468.  
  469. <:#284,9360>'singlestep(1)
  470.  
  471. <:#284,9360>opt = getprofilestring$("Tile Apps", "SelectAppHorzOpt", "amipro2.ini")
  472.  
  473. <:#284,9360>if opt = "h"
  474.  
  475. <:#284,9360>    filledit(23, 1)
  476.  
  477. <:#284,9360>else
  478.  
  479. <:#284,9360>    filledit(22, 1)
  480.  
  481. <:#284,9360>endif
  482.  
  483. <:#284,9360>app1 = getprofilestring$("Lotus Tiler", "App1", "amipro2.ini")
  484.  
  485. <:#284,9360>app2 = getprofilestring$("Lotus Tiler", "App2", "amipro2.ini")
  486.  
  487. <:#284,9360>if app1 = ""
  488.  
  489. <:#284,9360>    app1 = 30
  490.  
  491. <:#284,9360>    writeprofilestring("Lotus Tiler", "App1", app1, "amipro2.ini")
  492.  
  493. endif
  494.  
  495. if app2 = ""
  496.  
  497.     app2 = 31
  498.  
  499.     writeprofilestring("Lotus Tiler", "App2", app2, "amipro2.ini")
  500.  
  501. endif
  502.  
  503. writeprofilestring("Lotus Tiler", "App1Temp", app1, "amipro2.ini")
  504.  
  505. writeprofilestring("Lotus Tiler", "App2Temp", app2, "amipro2.ini")
  506.  
  507. filledit(app1, 1)
  508.  
  509. filledit(app2, 1)
  510.  
  511. app1 = ""
  512.  
  513. app2 = ""
  514.  
  515. rmac = getrunningmacrofile$()
  516.  
  517. for i = 30 to 39
  518.  
  519.     SetDlgCallBack(i, "{rmac}!checkque")
  520.  
  521. next
  522.  
  523. SetDlgCallBack(0, "{rmac}!initdlg")
  524.  
  525. amidir = getamidirectory$()
  526.  
  527. filledit(1000, "{amidir}amipro.icn")
  528.  
  529. filledit(1009, "{amidir}123w.icn")
  530.  
  531. filledit(1010, "{amidir}flw.icn")
  532.  
  533. filledit(1011, "{amidir}organize.icn")
  534.  
  535. filledit(1012, "{amidir}ccmail.icn")
  536.  
  537. filledit(1013, "{amidir}notes.icn")
  538.  
  539. filledit(1014, "{amidir}improv.icn")
  540.  
  541. filledit(1015, "{amidir}smartext.icn")
  542.  
  543. filledit(1016, "{amidir}smartpic.icn")
  544.  
  545. filledit(1002, "{amidir}ltsdlged.icn")
  546.  
  547. dlgkeyinterrupt(<[>f1], "{rmac}!helpme")
  548.  
  549. if dialogbox(".", "box1") <<<;> 1
  550.  
  551.     goto endit
  552.  
  553. endif
  554.  
  555. onerror endit
  556.  
  557. oncancel endit
  558.  
  559. for i = 30 to 39
  560.  
  561.     if getdialogfield$(i)
  562.  
  563.         app1 = i
  564.  
  565.         writeprofilestring("Lotus Tiler", "App1", i, "amipro2.ini")
  566.  
  567.         onlyone = 1
  568.  
  569.         i = i + 1
  570.  
  571.         for j = i to 39
  572.  
  573.             if getdialogfield$(j)
  574.  
  575.                 app2 = j
  576.  
  577.                 writeprofilestring("Lotus Tiler", "App2", j, "amipro2.ini")
  578.  
  579.                 onlyone = 0
  580.  
  581.                 goto out
  582.  
  583.             endif
  584.  
  585.         next
  586.  
  587.     endif
  588.  
  589. next
  590.  
  591. out:
  592.  
  593. if onlyone = 1
  594.  
  595.     for i = 30 to 39
  596.  
  597.         if getdialogfield$(i)
  598.  
  599.             break
  600.  
  601.         endif
  602.  
  603.     next
  604.  
  605.     launchapp(i, -1, 0)
  606.  
  607.     return 1
  608.  
  609. endif
  610.  
  611. tileway = getdialogfield$(22)
  612.  
  613. if app1 <;> 0
  614.  
  615.     launchapp(app1, tileway, 1)
  616.  
  617. endif
  618.  
  619. if app2 <;> 0
  620.  
  621.     launchapp(app2, tileway, 2)
  622.  
  623. endif
  624.  
  625. endit:
  626.  
  627. deletefont()
  628.  
  629. end function
  630.  
  631.  
  632.  
  633. @Function@function helpme()
  634.  
  635. WinHelpa(FindWindow("AmiProWndA", 0), strcat$(GetAmiDirectory$(), "HelpPack.hlp"), 0x0001, 10)
  636.  
  637. end function
  638.  
  639.  
  640.  
  641. @Function@function initdlg(hdlg, id, value)
  642.  
  643. setfont(hdlg, 1001)
  644.  
  645. end function
  646.  
  647.  
  648.  
  649. @Function@function checkque(hdlg, id, value)
  650.  
  651. ignorekeyboard(1)
  652.  
  653. if value
  654.  
  655.     app1 = getprofilestring$("Lotus Tiler", "App1Temp", "amipro2.ini")
  656.  
  657.     app2 = getprofilestring$("Lotus Tiler", "App2Temp", "amipro2.ini")
  658.  
  659.     if id <<<;> app1 and id <<<;> app2
  660.  
  661.         SetDlgItemText(hdlg, app1, 0)
  662.  
  663.         writeprofilestring("Lotus Tiler", "App1Temp", app2, "amipro2.ini")
  664.  
  665.         writeprofilestring("Lotus Tiler", "App2Temp", id, "amipro2.ini")
  666.  
  667.     endif
  668.  
  669. endif
  670.  
  671. end function
  672.  
  673.  
  674.  
  675. @Function@<+@>function launchapp(app, tileway, which)
  676.  
  677. <+@>ignorekeyboard(1)
  678.  
  679. <+@>onerror endit
  680.  
  681. <+@>oncancel endit
  682.  
  683. <+@>switch app
  684.  
  685. <+@>    case 30
  686.  
  687.         AppTitleBarName = ""
  688.  
  689.         LotusIniAppName = "AMIPRO"
  690.  
  691.         ClassName = "amiprownda"
  692.  
  693. <+@>        salesapp = 1
  694.  
  695. <+@>    case 31
  696.  
  697.         AppTitleBarName = "Lotus 1-2-3 Release 4"
  698.  
  699.         LotusIniAppName = "123W"
  700.  
  701.         ClassName = "123WParent"
  702.  
  703. <+@>        salesapp = 2
  704.  
  705. <+@>    case 32
  706.  
  707.         AppTitleBarName = "Freelance Graphics"
  708.  
  709.         LotusIniAppName = "FLW"
  710.  
  711.         ClassName = "FLWApp"
  712.  
  713. <+@>        salesapp = 3
  714.  
  715. <+@>    case 33
  716.  
  717.         AppTitleBarName = "Lotus Organizer"
  718.  
  719.         LotusIniAppName = "Organize"
  720.  
  721.         ClassName = "TZ_PORG"
  722.  
  723. <+@>        salesapp = 6
  724.  
  725. <+@>    case 34
  726.  
  727.         AppTitleBarName = "cc:Mail"
  728.  
  729.         LotusIniAppName = "ccmail"
  730.  
  731.         ClassName = "wmFrame"
  732.  
  733. <+@>        salesapp = 9
  734.  
  735. <+@>    case 35
  736.  
  737.         AppTitleBarName = "Lotus Notes"
  738.  
  739.         LotusIniAppName = "Notes"
  740.  
  741.         ClassName = "Notes"
  742.  
  743. <+@>        salesapp = 4
  744.  
  745. <+@>    case 36
  746.  
  747.         AppTitleBarName = "Lotus Improv"
  748.  
  749.         LotusIniAppName = "IMPROV"
  750.  
  751.         ClassName = "bbw:0"
  752.  
  753. <+@>        salesapp = 5
  754.  
  755. <+@>    case 37
  756.  
  757.         AppTitleBarName = "SmarText"
  758.  
  759. <+@>        if smartext() <<<;> 1
  760.  
  761. <+@>            salesmessage(8)
  762.  
  763. <+@>        endif
  764.  
  765. <+@>        return 1
  766.  
  767. <+@>    case 38
  768.  
  769.         AppTitleBarName = "Lotus SmartPics"
  770.  
  771.         LotusIniAppName = "SMARTPIC    "
  772.  
  773.         ClassName = "smartpics"
  774.  
  775. <+@>        salesapp = 7
  776.  
  777. <+@>    case 39
  778.  
  779.         AppTitleBarName = "Lotus Dialog Editor"
  780.  
  781.         ClassName = "Lotus Dialog Editor"
  782.  
  783.         hwnd = findwindow(classname, 0)
  784.  
  785.         if activateapp(AppTitleBarName)
  786.  
  787.             if isiconic(hwnd)
  788.  
  789.                 appsendmessage(hwnd, WM_SYSCOMMAND, SC_RESTORE, 0)
  790.  
  791. <+@>            endif
  792.  
  793. <+@>            goto readytotile
  794.  
  795. <+@>        endif
  796.  
  797.         execpath = getprofilestring$("Dialog Editor", "Program Path", "lotus.ini")
  798.  
  799.         if exec(strcat$(execpath, "\ltsdlged.exe"), "") << 32
  800.  
  801.             salesmessage(10)
  802.  
  803.             return 0
  804.  
  805.         endif
  806.  
  807.     goto readytotile
  808.  
  809. <+@>endswitch
  810.  
  811. hwnd = findwindow(classname, 0)
  812.  
  813. if hwnd <;> 1
  814.  
  815.     activateapp(AppTitleBarName)
  816.  
  817. <+@>    showwindow(hwnd, 9)
  818.  
  819.     goto readytotile
  820.  
  821. endif
  822.  
  823. app = GetProfileString$("Lotus Applications", LotusIniAppName, "lotus.ini")
  824.  
  825. if app = ""
  826.  
  827.     salesmessage(salesapp)
  828.  
  829.     return 0
  830.  
  831. endif
  832.  
  833. appexecname = strfield$(app, 1, ".")
  834.  
  835. appexecname = strcat$(appexecname, ".exe")
  836.  
  837. if Exec(appexecname, "") << 32
  838.  
  839.     salesmessage(salesapp)
  840.  
  841.     return 0
  842.  
  843. else
  844.  
  845.     hwnd = findwindow(classname, 0)
  846.  
  847.     if hwnd <;> 1
  848.  
  849.         activateapp(AppTitleBarName)
  850.  
  851. <+@>        showwindow(hwnd, 9)
  852.  
  853. <+@>        goto readytotile
  854.  
  855. <+@>    endif
  856.  
  857. endif
  858.  
  859. <+@>
  860.  
  861. <+@>readytotile:
  862.  
  863. app = apptitlebarname
  864.  
  865. if tileway = -1
  866.  
  867.     activateapp(app)
  868.  
  869.     return 1
  870.  
  871. endif
  872.  
  873. if which = 2
  874.  
  875.     if tileway
  876.  
  877.         writeprofilestring("Tile Apps", "SelectAppHorzOpt", "v", "amipro2.ini")
  878.  
  879.         appsize(app, 50, 100)
  880.  
  881.         appmove(app, 50, 0)
  882.  
  883.     else
  884.  
  885.         writeprofilestring("Tile Apps", "SelectAppHorzOpt", "h", "amipro2.ini")
  886.  
  887.         appsize(app, 100, 50)
  888.  
  889.         appmove(app, 0, 50)
  890.  
  891.     endif
  892.  
  893. else
  894.  
  895.     if tileway
  896.  
  897.         writeprofilestring("Tile Apps", "SelectAppHorzOpt", "v", "amipro2.ini")
  898.  
  899.         appsize(app, 50, 100)
  900.  
  901.         appmove(app, 0, 0)
  902.  
  903.     else
  904.  
  905.         writeprofilestring("Tile Apps", "SelectAppHorzOpt", "h", "amipro2.ini")
  906.  
  907.         appsize(app, 100, 50)
  908.  
  909.         appmove(app, 0, 0)
  910.  
  911.     endif
  912.  
  913. endif
  914.  
  915. <+@>return 1
  916.  
  917. <+@>endit:
  918.  
  919. <+@>return 0
  920.  
  921. <+@>end function
  922.  
  923. <+@>
  924.  
  925. <+@>
  926.  
  927. @Function@<+@>function salesmessage(appname)
  928.  
  929. <+@>ignorekeyboard(1)
  930.  
  931. <+@>amidir = getamidirectory$()
  932.  
  933. <+@>macro = "{amidir}lotuspal.smm!salesmsg"
  934.  
  935. <+@>calli macro(appname)
  936.  
  937. <+@>end function
  938.  
  939. <+@>
  940.  
  941. <+@>
  942.  
  943. @Function@function smartext()
  944.  
  945. ignorekeyboard(1)
  946.  
  947. app = "reader.exe"
  948.  
  949. appname = "SmarText"
  950.  
  951. defdir = "c:\smartext"
  952.  
  953. ignorekeyboard(2)
  954.  
  955. declare missouri(xapp) ' <:f200,QCourier,0,0,255>declare user defined functions
  956.  
  957. declare getprofile(xappname)
  958.  
  959. declare writeprofile(path, xappname)
  960.  
  961. declare tryit(path, xapp)
  962.  
  963. defstr path;
  964.  
  965.  
  966. if appisrunning(appname) ' <:f200,QCourier,0,0,255>first see if app is already running
  967.  
  968.     activateapp(appname) ' <:f200,QCourier,0,0,255>if the app is running, just activate it
  969.  
  970.     apprestore(appname) ' <:f200,QCourier,0,0,255>make sure it is not minimized<:f>
  971.  
  972.     return 1
  973.  
  974. endif
  975.  
  976. if 0 = doschdir(defdir) ' <:f200,QCourier,0,0,255>try and change to the default directory for launch
  977.  
  978.     if tryit("", app) <;> 31
  979.  
  980.         return 1
  981.  
  982.     endif
  983.  
  984. endif
  985.  
  986. if tryit(getprofile(appname), app) <;> 31 ' <:f200,QCourier,0,0,255>if we launch, get out<:f>
  987.  
  988.     return 1
  989.  
  990. endif
  991.  
  992. again:
  993.  
  994. if assign(&path, missouri(app)) <<<;> 0 ' <:f200,QCourier,0,0,255>show me where the exe is
  995.  
  996.     if tryit(path, app) <;> 31
  997.  
  998.         writeprofile(path, appname)
  999.  
  1000.     else
  1001.  
  1002.         goto again
  1003.  
  1004.     endif
  1005.  
  1006. endif
  1007.  
  1008. end function
  1009.  
  1010.  
  1011. @Function@function tryit(path, app) ' <:f200,QCourier,0,0,255>this function attemts to exec the app
  1012.  
  1013. doschdir(path)
  1014.  
  1015. return exec(strcat$(path, app), "")
  1016.  
  1017. end function
  1018.  
  1019.  
  1020. @Function@function writeprofile(path, appname) ' <:f200,QCourier,0,0,255>save the path if exec works
  1021.  
  1022. writeprofilestring("LotusApps", appname, path, "amipro2.ini")
  1023.  
  1024. end function
  1025.  
  1026.  
  1027. @Function@function getprofile(appname) ' <:f200,QCourier,0,0,255>get the path of successful exec
  1028.  
  1029. defstr path;
  1030.  
  1031. if assign(&path, getprofilestring$("LotusApps", appname, "amipro2.ini")) <<<;> ""
  1032.  
  1033.     return path
  1034.  
  1035. endif
  1036.  
  1037. return getprofilestring$("LotusApps", appname, "amipro.ini")
  1038.  
  1039. end function
  1040.  
  1041.  
  1042. @Function@function missouri(app) ' <:f200,QCourier,0,0,255>ask user for location of exe
  1043.  
  1044. defstr box;
  1045.  
  1046. filledit(9001, "*.exe")
  1047.  
  1048. filledit(8007, app)
  1049.  
  1050. if assign(&box, dialogbox(".", "findapp")) <<<;> 1
  1051.  
  1052.     return 0
  1053.  
  1054. endif
  1055.  
  1056. return getcurrentdir$()
  1057.  
  1058. end function
  1059.  
  1060.  
  1061.  
  1062. @Function@DIALOG findapp
  1063.  
  1064. -2134376448 7 70 35 200 97 "" "" "Find Application"
  1065.  
  1066. FONT 8 "Helv"
  1067.  
  1068. 7 34 59 8 1000 1342177280 "static" "&Program path:" 0 
  1069.  
  1070. 6 45 60 44 9001 1352728579 "listbox" "" 0 
  1071.  
  1072. 155 5 40 14 1 1342373889 "button" "OK" 0 
  1073.  
  1074. 155 21 40 14 2 1342373888 "button" "Cancel" 0 
  1075.  
  1076. 68 34 80 8 7999 1342177280 "static" "" 0 
  1077.  
  1078. 7 6 142 9 1006 1342177280 "static" "Change into the directory that contains" 0 
  1079.  
  1080. 7 16 107 8 8007 1342177280 "static" "" 0 
  1081.  
  1082. END DIALOG
  1083.  
  1084.  
  1085.  
  1086. @Function@DIALOG    box1
  1087.  
  1088. -2134376448    26    86    27    181    184    ""    "amidialog"    "Lotus Application Tiler"
  1089.  
  1090. FONT    8    "Helv"
  1091.  
  1092. 5    4    97    17    1001    1342308352    "static"    "Select the two Lotus applications you would like to tile."    0 
  1093.  
  1094. 6    34    18    16    1000    1342177290    "static"    "amipro.icn"    0 
  1095.  
  1096. 30    37    45    14    30    1342242819    "button"    "&Ami Pro"    0 
  1097.  
  1098. 6    56    18    16    1009    1342177290    "static"    "123w.icn"    0 
  1099.  
  1100. 30    59    45    14    31    1342242819    "button"    "&1-2-3"    0 
  1101.  
  1102. 6    78    18    16    1010    1342177290    "static"    "flw.icn"    0 
  1103.  
  1104. 30    81    45    14    32    1342242819    "button"    "&Freelance"    0 
  1105.  
  1106. 6    100    18    16    1011    1342177290    "static"    "organize.icn"    0 
  1107.  
  1108. 30    103    45    14    33    1342242819    "button"    "&Organizer"    0 
  1109.  
  1110. 6    122    18    16    1012    1342177290    "static"    "ccmail.icn"    0 
  1111.  
  1112. 30    125    45    14    34    1342242819    "button"    "&cc:Mail"    0 
  1113.  
  1114. 90    34    18    16    1013    1342177290    "static"    "notes.icn"    0 
  1115.  
  1116. 114    37    45    14    35    1342242819    "button"    "&Notes"    0 
  1117.  
  1118. 90    56    18    16    1014    1342177290    "static"    "improv.icn"    0 
  1119.  
  1120. 114    59    45    14    36    1342242819    "button"    "&Improv"    0 
  1121.  
  1122. 90    78    18    16    1015    1342177290    "static"    "smartext.icn"    0 
  1123.  
  1124. 114    81    45    14    37    1342242819    "button"    "&SmarText"    0 
  1125.  
  1126. 90    100    18    16    1016    1342177290    "static"    "smartpic.icn"    0 
  1127.  
  1128. 114    103    45    14    38    1342242819    "button"    "Smart&Pics"    0 
  1129.  
  1130. 90    122    18    16    1002    1342177290    "static"    "ltsdlged.icn"    0 
  1131.  
  1132. 114    125    60    14    39    1342242819    "button"    "&Dialog Editor"    0 
  1133.  
  1134. 5    144    69    35    20    1342308359    "button"    "Tile"    0 
  1135.  
  1136. 10    153    58    12    22    1342242825    "button"    "&Vertically"    0 
  1137.  
  1138. 10    166    58    12    23    1342242825    "button"    "&Horizontally"    0 
  1139.  
  1140. 136    3    40    14    1    1342373889    "button"    "OK"    0 
  1141.  
  1142. 136    19    40    14    2    1342373888    "button"    "Cancel"    0 
  1143.  
  1144. END DIALOG
  1145.  
  1146.  
  1147.  
  1148. @Function@function createdlgfont()
  1149.  
  1150. ignorekeyboard(1)
  1151.  
  1152. rmac = getrunningmacrofile$()
  1153.  
  1154. hfont = CreateFont(13, 0, 0, 0, 400, 0, 0, 0, 0, 0, 0, 0, 32, "Helv")
  1155.  
  1156. if hfont <;> 1
  1157.  
  1158.     AllocGlobalVar("{rmac}hfont", 1)
  1159.  
  1160.     SetGlobalVar("{rmac}hfont", hFont)
  1161.  
  1162.     Return hfont
  1163.  
  1164. endif
  1165.  
  1166. End Function
  1167.  
  1168.  
  1169.  
  1170. @Function@function deletefont()
  1171.  
  1172. ignorekeyboard(1)
  1173.  
  1174. rmac = getrunningmacrofile$()
  1175.  
  1176. AllocGlobalVar("{rmac}hfont", 1)
  1177.  
  1178. hfont = getglobalvar$("{rmac}hfont")
  1179.  
  1180. if hfont <;> 1
  1181.  
  1182.     deleteobject(hfont)
  1183.  
  1184.     freeglobalvar("{rmac}hfont")
  1185.  
  1186. endif
  1187.  
  1188. end function
  1189.  
  1190.  
  1191.  
  1192. @Function@function setfont(hdlg, id)
  1193.  
  1194. ignorekeyboard(1)
  1195.  
  1196. rmac = getrunningmacrofile$()
  1197.  
  1198. AllocGlobalVar("{rmac}hfont", 1)
  1199.  
  1200. hfont = getglobalvar$("{rmac}hfont")
  1201.  
  1202. if hfont << 1
  1203.  
  1204.     if createdlgfont() << 1
  1205.  
  1206.         return 0
  1207.  
  1208.     endif
  1209.  
  1210. endif
  1211.  
  1212. hfont = getglobalvar$("{rmac}hfont")
  1213.  
  1214. SendMessage(GetDlgITem(Hdlg, id), WM_SETFONT, hfont, 0)
  1215.  
  1216. end function
  1217.  
  1218.  
  1219.  
  1220. >
  1221.  
  1222. [Embedded]
  1223. 00015951
  1224. >
  1225. [macsum] 16
  1226. tileapps 0 0 10 29
  1227. helpme 1935 0 1 114
  1228. initdlg 2087 3 1 119
  1229. checkque 2134 3 3 124
  1230. launchapp 2469 3 8 138
  1231. salesmessage 5106 1 3 264
  1232. smartext 5210 0 5 272
  1233. tryit 5740 2 1 307
  1234. writeprofile 5821 2 1 312
  1235. getprofile 5895 1 2 316
  1236. missouri 6069 1 2 324
  1237. findapp 6226 0 -1 335
  1238. box1 6670 0 -1 348
  1239. createdlgfont 8175 0 3 380
  1240. deletefont 8399 0 3 392
  1241. setfont 8579 2 3 404
  1242. [macse]
  1243. 14 tileapps
  1244. 0 32 1
  1245. 0 286 "Tile Apps" "SelectAppHorzOpt" "amipro2.ini"
  1246. 13
  1247. 8 1
  1248. 6 1
  1249. 7 "h"
  1250. 18 0
  1251. 11 00000137
  1252. 0 31 23 1
  1253. 10 00000148
  1254. 0 31 22 1
  1255. 0 286 "Lotus Tiler" "App1" "amipro2.ini"
  1256. 13
  1257. 8 2
  1258. 0 286 "Lotus Tiler" "App2" "amipro2.ini"
  1259. 13
  1260. 8 3
  1261. 6 2
  1262. 7 ""
  1263. 18 0
  1264. 11 00000339
  1265. 5 30
  1266. 8 2
  1267. 0 287 "Lotus Tiler" "App1" "{2}" "amipro2.ini"
  1268. 6 3
  1269. 7 ""
  1270. 18 0
  1271. 11 00000428
  1272. 5 31
  1273. 8 3
  1274. 0 287 "Lotus Tiler" "App2" "{3}" "amipro2.ini"
  1275. 0 287 "Lotus Tiler" "App1Temp" "{2}" "amipro2.ini"
  1276. 0 287 "Lotus Tiler" "App2Temp" "{3}" "amipro2.ini"
  1277. 0 31 "{2}" 1
  1278. 0 31 "{3}" 1
  1279. 7 ""
  1280. 8 2
  1281. 7 ""
  1282. 8 3
  1283. 0 802
  1284. 13
  1285. 8 4
  1286. 5 30
  1287. 8 5
  1288. 5 39
  1289. 6 5
  1290. 18 2
  1291. 12 00000685
  1292. 10 00000725
  1293. 5 1
  1294. 6 5
  1295. 3 0
  1296. 8 5
  1297. 10 00000609
  1298. 0 41 "{5}" "{4}!checkque"
  1299. 10 00000652
  1300. 0 41 0 "{4}!initdlg"
  1301. 0 798
  1302. 13
  1303. 8 6
  1304. 0 31 1000 "{6}amipro.icn"
  1305. 0 31 1009 "{6}123w.icn"
  1306. 0 31 1010 "{6}flw.icn"
  1307. 0 31 1011 "{6}organize.icn"
  1308. 0 31 1012 "{6}ccmail.icn"
  1309. 0 31 1013 "{6}notes.icn"
  1310. 0 31 1014 "{6}improv.icn"
  1311. 0 31 1015 "{6}smartext.icn"
  1312. 0 31 1016 "{6}smartpic.icn"
  1313. 0 31 1002 "{6}ltsdlged.icn"
  1314. 0 47 112 "{4}!helpme"
  1315. 0 26 "." "box1"
  1316. 13
  1317. 5 1
  1318. 18 1
  1319. 11 00001116
  1320. 10 00001908
  1321. 20 00001908
  1322. 19 00001908
  1323. 5 30
  1324. 8 5
  1325. 5 39
  1326. 6 5
  1327. 18 2
  1328. 12 00001229
  1329. 10 00001568
  1330. 5 1
  1331. 6 5
  1332. 3 0
  1333. 8 5
  1334. 10 00001153
  1335. 0 27 "{5}"
  1336. 13
  1337. 11 00001555
  1338. 6 5
  1339. 8 2
  1340. 0 287 "Lotus Tiler" "App1" "{5}" "amipro2.ini"
  1341. 5 1
  1342. 8 7
  1343. 6 5
  1344. 5 1
  1345. 3 0
  1346. 8 5
  1347. 6 5
  1348. 8 8
  1349. 5 39
  1350. 6 8
  1351. 18 2
  1352. 12 00001432
  1353. 10 00001555
  1354. 5 1
  1355. 6 8
  1356. 3 0
  1357. 8 8
  1358. 10 00001356
  1359. 0 27 "{8}"
  1360. 13
  1361. 11 00001542
  1362. 6 8
  1363. 8 3
  1364. 0 287 "Lotus Tiler" "App2" "{8}" "amipro2.ini"
  1365. 5 0
  1366. 8 7
  1367. 10 00001568
  1368. 10 00001399
  1369. 10 00001196
  1370. 6 7
  1371. 5 1
  1372. 18 0
  1373. 11 00001776
  1374. 5 30
  1375. 8 5
  1376. 5 39
  1377. 6 5
  1378. 18 2
  1379. 12 00001684
  1380. 10 00001739
  1381. 5 1
  1382. 6 5
  1383. 3 0
  1384. 8 5
  1385. 10 00001608
  1386. 0 27 "{5}"
  1387. 13
  1388. 11 00001726
  1389. 10 00001739
  1390. 10 00001651
  1391. 16 launchapp "{5}" -1 0
  1392. 5 1
  1393. 15
  1394. 9
  1395. 0 27 22
  1396. 13
  1397. 8 9
  1398. 6 2
  1399. 5 0
  1400. 18 3
  1401. 11 00001851
  1402. 16 launchapp "{2}" "{9}" 1
  1403. 6 3
  1404. 5 0
  1405. 18 3
  1406. 11 00001908
  1407. 16 launchapp "{3}" "{9}" 2
  1408. 16 deletefont
  1409. 6 0
  1410. 15
  1411. 9
  1412. 14 helpme
  1413. 0 284 "user,FindWindow,HCC" "AmiProWndA" 0
  1414. 13
  1415. 0 798
  1416. 13
  1417. 0 16 [X] "HelpPack.hlp"
  1418. 13
  1419. 0 284 "user,WinHelp,HHCHJ" [X] [X] 1 10
  1420. 6 0
  1421. 15
  1422. 9
  1423. 14 initdlg
  1424. 16 setfont "{0}" 1001
  1425. 6 3
  1426. 15
  1427. 9
  1428. 14 checkque
  1429. 0 32 1
  1430. 6 2
  1431. 11 00000323
  1432. 0 286 "Lotus Tiler" "App1Temp" "amipro2.ini"
  1433. 13
  1434. 8 4
  1435. 0 286 "Lotus Tiler" "App2Temp" "amipro2.ini"
  1436. 13
  1437. 8 5
  1438. 6 1
  1439. 6 4
  1440. 18 1
  1441. 6 1
  1442. 6 5
  1443. 18 1
  1444. 1 1
  1445. 11 00000323
  1446. 0 43 "{0}" "{4}" 0
  1447. 0 287 "Lotus Tiler" "App1Temp" "{5}" "amipro2.ini"
  1448. 0 287 "Lotus Tiler" "App2Temp" "{1}" "amipro2.ini"
  1449. 6 3
  1450. 15
  1451. 9
  1452. 14 launchapp
  1453. 0 32 1
  1454. 20 00002613
  1455. 19 00002613
  1456. 5 30
  1457. 6 0
  1458. 18 0
  1459. 11 00000150
  1460. 7 ""
  1461. 8 4
  1462. 7 "AMIPRO"
  1463. 8 5
  1464. 7 "amiprownda"
  1465. 8 6
  1466. 5 1
  1467. 8 7
  1468. 10 00001506
  1469. 5 31
  1470. 6 0
  1471. 18 0
  1472. 11 00000271
  1473. 7 "Lotus 1-2-3 Release 4"
  1474. 8 4
  1475. 7 "123W"
  1476. 8 5
  1477. 7 "123WParent"
  1478. 8 6
  1479. 5 2
  1480. 8 7
  1481. 10 00001506
  1482. 5 32
  1483. 6 0
  1484. 18 0
  1485. 11 00000384
  1486. 7 "Freelance Graphics"
  1487. 8 4
  1488. 7 "FLW"
  1489. 8 5
  1490. 7 "FLWApp"
  1491. 8 6
  1492. 5 3
  1493. 8 7
  1494. 10 00001506
  1495. 5 33
  1496. 6 0
  1497. 18 0
  1498. 11 00000500
  1499. 7 "Lotus Organizer"
  1500. 8 4
  1501. 7 "Organize"
  1502. 8 5
  1503. 7 "TZ_PORG"
  1504. 8 6
  1505. 5 6
  1506. 8 7
  1507. 10 00001506
  1508. 5 34
  1509. 6 0
  1510. 18 0
  1511. 11 00000606
  1512. 7 "cc:Mail"
  1513. 8 4
  1514. 7 "ccmail"
  1515. 8 5
  1516. 7 "wmFrame"
  1517. 8 6
  1518. 5 9
  1519. 8 7
  1520. 10 00001506
  1521. 5 35
  1522. 6 0
  1523. 18 0
  1524. 11 00000713
  1525. 7 "Lotus Notes"
  1526. 8 4
  1527. 7 "Notes"
  1528. 8 5
  1529. 7 "Notes"
  1530. 8 6
  1531. 5 4
  1532. 8 7
  1533. 10 00001506
  1534. 5 36
  1535. 6 0
  1536. 18 0
  1537. 11 00000822
  1538. 7 "Lotus Improv"
  1539. 8 4
  1540. 7 "IMPROV"
  1541. 8 5
  1542. 7 "bbw:0"
  1543. 8 6
  1544. 5 5
  1545. 8 7
  1546. 10 00001506
  1547. 5 37
  1548. 6 0
  1549. 18 0
  1550. 11 00000956
  1551. 7 "SmarText"
  1552. 8 4
  1553. 16 smartext
  1554. 13
  1555. 5 1
  1556. 18 1
  1557. 11 00000931
  1558. 16 salesmessage 8
  1559. 5 1
  1560. 15
  1561. 9
  1562. 10 00001506
  1563. 5 38
  1564. 6 0
  1565. 18 0
  1566. 11 00001075
  1567. 7 "Lotus SmartPics"
  1568. 8 4
  1569. 7 "SMARTPIC    "
  1570. 8 5
  1571. 7 "smartpics"
  1572. 8 6
  1573. 5 7
  1574. 8 7
  1575. 10 00001506
  1576. 5 39
  1577. 6 0
  1578. 18 0
  1579. 11 00001506
  1580. 7 "Lotus Dialog Editor"
  1581. 8 4
  1582. 7 "Lotus Dialog Editor"
  1583. 8 6
  1584. 0 284 "user,FindWindow,HCC" "{6}" 0
  1585. 13
  1586. 8 8
  1587. 0 38 "{4}"
  1588. 13
  1589. 11 00001328
  1590. 0 284 "user,IsIconic,HH" "{8}"
  1591. 13
  1592. 11 00001315
  1593. 0 1036 "{8}" 274 61728 0
  1594. 10 00002051
  1595. 0 286 "Dialog Editor" "Program Path" "lotus.ini"
  1596. 13
  1597. 8 9
  1598. 0 16 "{9}" "\ltsdlged.exe"
  1599. 13
  1600. 0 22 [X] ""
  1601. 13
  1602. 5 32
  1603. 18 5
  1604. 11 00001493
  1605. 16 salesmessage 10
  1606. 5 0
  1607. 15
  1608. 9
  1609. 10 00002051
  1610. 0 284 "user,FindWindow,HCC" "{6}" 0
  1611. 13
  1612. 8 8
  1613. 6 8
  1614. 5 1
  1615. 18 3
  1616. 11 00001643
  1617. 0 38 "{4}"
  1618. 0 284 "user,ShowWindow,HHH" "{8}" 9
  1619. 10 00002051
  1620. 0 286 "Lotus Applications" "{5}" "lotus.ini"
  1621. 13
  1622. 8 0
  1623. 6 0
  1624. 7 ""
  1625. 18 0
  1626. 11 00001763
  1627. 16 salesmessage "{7}"
  1628. 5 0
  1629. 15
  1630. 9
  1631. 0 20 "{0}" 1 "."
  1632. 13
  1633. 8 10
  1634. 0 16 "{10}" ".exe"
  1635. 13
  1636. 8 10
  1637. 0 22 "{10}" ""
  1638. 13
  1639. 5 32
  1640. 18 5
  1641. 11 00001914
  1642. 16 salesmessage "{7}"
  1643. 5 0
  1644. 15
  1645. 9
  1646. 10 00002051
  1647. 0 284 "user,FindWindow,HCC" "{6}" 0
  1648. 13
  1649. 8 8
  1650. 6 8
  1651. 5 1
  1652. 18 3
  1653. 11 00002051
  1654. 0 38 "{4}"
  1655. 0 284 "user,ShowWindow,HHH" "{8}" 9
  1656. 10 00002051
  1657. 6 4
  1658. 8 0
  1659. 6 1
  1660. 5 -1
  1661. 18 0
  1662. 11 00002115
  1663. 0 38 "{0}"
  1664. 5 1
  1665. 15
  1666. 9
  1667. 6 2
  1668. 5 2
  1669. 18 0
  1670. 11 00002380
  1671. 6 1
  1672. 11 00002271
  1673. 0 287 "Tile Apps" "SelectAppHorzOpt" "v" "amipro2.ini"
  1674. 0 1026 "{0}" 50 100
  1675. 0 1025 "{0}" 50 0
  1676. 10 00002367
  1677. 0 287 "Tile Apps" "SelectAppHorzOpt" "h" "amipro2.ini"
  1678. 0 1026 "{0}" 100 50
  1679. 0 1025 "{0}" 0 50
  1680. 10 00002601
  1681. 6 1
  1682. 11 00002506
  1683. 0 287 "Tile Apps" "SelectAppHorzOpt" "v" "amipro2.ini"
  1684. 0 1026 "{0}" 50 100
  1685. 0 1025 "{0}" 0 0
  1686. 10 00002601
  1687. 0 287 "Tile Apps" "SelectAppHorzOpt" "h" "amipro2.ini"
  1688. 0 1026 "{0}" 100 50
  1689. 0 1025 "{0}" 0 0
  1690. 5 1
  1691. 15
  1692. 9
  1693. 5 0
  1694. 15
  1695. 9
  1696. 6 3
  1697. 15
  1698. 9
  1699. 14 salesmessage
  1700. 0 32 1
  1701. 0 798
  1702. 13
  1703. 8 2
  1704. 7 "{2}lotuspal.smm!salesmsg"
  1705. 8 3
  1706. 16 "{3}" "{0}"
  1707. 6 1
  1708. 15
  1709. 9
  1710. 14 smartext
  1711. 0 32 1
  1712. 7 "reader.exe"
  1713. 8 1
  1714. 7 "SmarText"
  1715. 8 2
  1716. 7 "c:\smartext"
  1717. 8 3
  1718. 0 32 2
  1719. 0 1032 "{2}"
  1720. 13
  1721. 11 00000160
  1722. 0 38 "{2}"
  1723. 0 1031 "{2}"
  1724. 5 1
  1725. 15
  1726. 9
  1727. 5 0
  1728. 0 781 "{3}"
  1729. 13
  1730. 18 0
  1731. 11 00000261
  1732. 16 tryit "" "{1}"
  1733. 13
  1734. 5 31
  1735. 18 3
  1736. 11 00000261
  1737. 5 1
  1738. 15
  1739. 9
  1740. 16 getprofile "{2}"
  1741. 13
  1742. 16 tryit [X] "{1}"
  1743. 13
  1744. 5 31
  1745. 18 3
  1746. 11 00000347
  1747. 5 1
  1748. 15
  1749. 9
  1750. 16 missouri "{1}"
  1751. 13
  1752. 0 805 &4 [X]
  1753. 13
  1754. 5 0
  1755. 18 1
  1756. 11 00000518
  1757. 16 tryit "{4}" "{1}"
  1758. 13
  1759. 5 31
  1760. 18 3
  1761. 11 00000505
  1762. 16 writeprofile "{4}" "{2}"
  1763. 10 00000518
  1764. 10 00000347
  1765. 6 0
  1766. 15
  1767. 9
  1768. 14 tryit
  1769. 0 781 "{0}"
  1770. 0 16 "{0}" "{1}"
  1771. 13
  1772. 0 22 [X] ""
  1773. 13
  1774. 15
  1775. 9
  1776. 6 2
  1777. 15
  1778. 9
  1779. 14 writeprofile
  1780. 0 287 "LotusApps" "{1}" "{0}" "amipro2.ini"
  1781. 6 2
  1782. 15
  1783. 9
  1784. 14 getprofile
  1785. 0 286 "LotusApps" "{0}" "amipro2.ini"
  1786. 13
  1787. 0 805 &2 [X]
  1788. 13
  1789. 7 ""
  1790. 18 1
  1791. 11 00000113
  1792. 6 2
  1793. 15
  1794. 9
  1795. 0 286 "LotusApps" "{0}" "amipro.ini"
  1796. 13
  1797. 15
  1798. 9
  1799. 6 1
  1800. 15
  1801. 9
  1802. 14 missouri
  1803. 0 31 9001 "*.exe"
  1804. 0 31 8007 "{0}"
  1805. 0 26 "." "findapp"
  1806. 13
  1807. 0 805 &2 [X]
  1808. 13
  1809. 5 1
  1810. 18 1
  1811. 11 00000127
  1812. 5 0
  1813. 15
  1814. 9
  1815. 0 290
  1816. 13
  1817. 15
  1818. 9
  1819. 6 1
  1820. 15
  1821. 9
  1822. DIALOG findapp
  1823. -2134376448 7 70 35 200 97 "" "" "Find Application" 
  1824. FONT 8 "Helv" 
  1825. 7 34 59 8 1000 1342177280 "static" "&Program path:" 0 
  1826. 6 45 60 44 9001 1352728579 "listbox" "" 0 
  1827. 155 5 40 14 1 1342373889 "button" "OK" 0 
  1828. 155 21 40 14 2 1342373888 "button" "Cancel" 0 
  1829. 68 34 80 8 7999 1342177280 "static" "" 0 
  1830. 7 6 142 9 1006 1342177280 "static" "Change into the directory that contains" 0 
  1831. 7 16 107 8 8007 1342177280 "static" "" 0 
  1832. DIALOG box1
  1833. -2134376448 26 86 27 181 184 "" "amidialog" "Lotus Application Tiler" 
  1834. FONT 8 "Helv" 
  1835. 5 4 97 17 1001 1342308352 "static" "Select the two Lotus applications you would like to tile." 0 
  1836. 6 34 18 16 1000 1342177290 "static" "amipro.icn" 0 
  1837. 30 37 45 14 30 1342242819 "button" "&Ami Pro" 0 
  1838. 6 56 18 16 1009 1342177290 "static" "123w.icn" 0 
  1839. 30 59 45 14 31 1342242819 "button" "&1-2-3" 0 
  1840. 6 78 18 16 1010 1342177290 "static" "flw.icn" 0 
  1841. 30 81 45 14 32 1342242819 "button" "&Freelance" 0 
  1842. 6 100 18 16 1011 1342177290 "static" "organize.icn" 0 
  1843. 30 103 45 14 33 1342242819 "button" "&Organizer" 0 
  1844. 6 122 18 16 1012 1342177290 "static" "ccmail.icn" 0 
  1845. 30 125 45 14 34 1342242819 "button" "&cc:Mail" 0 
  1846. 90 34 18 16 1013 1342177290 "static" "notes.icn" 0 
  1847. 114 37 45 14 35 1342242819 "button" "&Notes" 0 
  1848. 90 56 18 16 1014 1342177290 "static" "improv.icn" 0 
  1849. 114 59 45 14 36 1342242819 "button" "&Improv" 0 
  1850. 90 78 18 16 1015 1342177290 "static" "smartext.icn" 0 
  1851. 114 81 45 14 37 1342242819 "button" "&SmarText" 0 
  1852. 90 100 18 16 1016 1342177290 "static" "smartpic.icn" 0 
  1853. 114 103 45 14 38 1342242819 "button" "Smart&Pics" 0 
  1854. 90 122 18 16 1002 1342177290 "static" "ltsdlged.icn" 0 
  1855. 114 125 60 14 39 1342242819 "button" "&Dialog Editor" 0 
  1856. 5 144 69 35 20 1342308359 "button" "Tile" 0 
  1857. 10 153 58 12 22 1342242825 "button" "&Vertically" 0 
  1858. 10 166 58 12 23 1342242825 "button" "&Horizontally" 0 
  1859. 136 3 40 14 1 1342373889 "button" "OK" 0 
  1860. 136 19 40 14 2 1342373888 "button" "Cancel" 0 
  1861. 14 createdlgfont
  1862. 0 32 1
  1863. 0 802
  1864. 13
  1865. 8 1
  1866. 0 284 "gdi,CreateFont,HHHHHHHHHHHHHHC" 13 0 0 0 400 0 0 0 0 0 0 0 0 "Helv"
  1867. 13
  1868. 8 2
  1869. 6 2
  1870. 5 1
  1871. 18 3
  1872. 11 00000212
  1873. 0 271 "{1}hfont" 1
  1874. 0 264 "{1}hfont" "{2}"
  1875. 6 2
  1876. 15
  1877. 9
  1878. 6 0
  1879. 15
  1880. 9
  1881. 14 deletefont
  1882. 0 32 1
  1883. 0 802
  1884. 13
  1885. 8 1
  1886. 0 271 "{1}hfont" 1
  1887. 0 265 "{1}hfont"
  1888. 13
  1889. 8 2
  1890. 6 2
  1891. 5 1
  1892. 18 3
  1893. 11 00000168
  1894. 0 284 "gdi,DeleteObject,HH" "{2}"
  1895. 0 266 "{1}hfont"
  1896. 6 0
  1897. 15
  1898. 9
  1899. 14 setfont
  1900. 0 32 1
  1901. 0 802
  1902. 13
  1903. 8 3
  1904. 0 271 "{3}hfont" 1
  1905. 0 265 "{3}hfont"
  1906. 13
  1907. 8 4
  1908. 6 4
  1909. 5 1
  1910. 18 5
  1911. 11 00000170
  1912. 16 createdlgfont
  1913. 13
  1914. 5 1
  1915. 18 5
  1916. 11 00000170
  1917. 5 0
  1918. 15
  1919. 9
  1920. 0 265 "{3}hfont"
  1921. 13
  1922. 8 4
  1923. 0 44 "{0}" "{1}"
  1924. 13
  1925. 0 284 "user,SendMessage,HHHHJ" [X] 48 "{4}" 0
  1926. 6 2
  1927. 15
  1928. 9
  1929. 00015976
  1930.